#!/usr/bin/env perl

use utf8;
use strict;
use 5.010;

foreach my $file (@ARGV){
	say "$file is readable and writeable" if -o -r -w $file;
}
